home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_90-12_1990_-_de_Side_B.d64 / pipeline run (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  563b  |  18 lines
  1. 1 ifa=0then9
  2. 2 ifa=1thena=2:load"pipe 1",8,1
  3. 3 ifa=2thensys39452:a=3
  4. 4 ifa=3thena=4:load"pipe 2",8,1
  5. 5 ifa=4thena=5:load"sprites",8,1
  6. 6 ifa=5thena=6:load"pipe 3",8,1
  7. 7 goto50
  8. 9 poke53248+22,24:poke53282,8:poke53283,5:poke53280,0:poke53281,0
  9. 10 fori=832to832+33:reada:pokei,a:next
  10. 11 data120,169,51,133,1,169,0,133,95,133,90,133,88,169,208,133,96,169,240
  11. 12 data133,89,169,224,133,91,32,191,163,169,55,133,1,88,96
  12. 13 sys832:poke850,160:sys832
  13. 14 poke56576,peek(56576)and252
  14. 15 poke53272,8:poke648,192:a=1:print"[147]loading ... please wait !":goto2
  15. 50 print"[147][144]load"chr$(34)"main"chr$(34)",8"
  16. 51 print"run"
  17. 52 poke631,19:poke632,13:poke633,13:poke634,13:poke198,4:new
  18.